home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1996 February
/
EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso
/
earcd
/
midi
/
mdtls122.lha
/
Install MEDUtils
next >
Wrap
Text File
|
1995-08-02
|
2KB
|
60 lines
(
(set InstallChoices
(askoptions
(prompt "\nPlease select which parts of MEDUtils you would like to install:\n")
(help
(cat
"MEDPlay plays MED and OctaMED music modules.\n"
"MEDAlloc, MEDRip etc are used for extracting music modules from games and demos.\n"
"MEDUtils.doc provides documentation for these programs.\n"
"MEDUtils.guide provides documentation in AmigaGuide format.\n"
"For more information, read MEDUtils.doc/guide.\n"
@askoptions-help
)
)
(choices "MEDPlay" "MakeRipperDisk, MEDAlloc, MEDRip and MEDWipe" "MEDUtils.doc" "MEDUtils.guide")
(default 11)
)
)
(set @default-dest
(askdir
(prompt "Select the directory to install the chosen programs to:")
(help @askdir-help)
(default "")
)
)
(if (bitand InstallChoices 1)
(
(copyfiles (source "MEDPlay") (dest @default-dest))
(copyfiles (source "MEDPlay.info") (dest @default-dest))
(copylib (source "reqtools.library") (dest "LIBS:"))
)
)
(if (bitand InstallChoices 2)
(
(copyfiles (source "MakeRipperDisk") (dest @default-dest))
(copyfiles (source "MakeRipperDisk.info") (dest @default-dest))
(copyfiles (source "MEDAlloc") (dest @default-dest))
(copyfiles (source "MEDAlloc.info") (dest @default-dest))
(copyfiles (source "MEDRip") (dest @default-dest))
(copyfiles (source "MEDRip.info") (dest @default-dest))
(copyfiles (source "MEDWipe") (dest @default-dest))
(copyfiles (source "MEDWipe.info") (dest @default-dest))
)
)
(if (bitand InstallChoices 4)
(
(copyfiles (source "MEDUtils.doc") (dest @default-dest))
(copyfiles (source "MEDUtils.doc.info") (dest @default-dest))
)
)
(if (bitand InstallChoices 8)
(
(copyfiles (source "MEDUtils.guide") (dest @default-dest))
(copyfiles (source "MEDUtils.guide.info") (dest @default-dest))
)
)
)